| run file for smbserver application

Set Samba$Dir <Obey$Dir>

*IconSprites <Obey$Dir>.!Sprites
|
if "<System$Path>" = "" then Error 0 System resources cannot be found
|
RMEnsure SharedCLibrary 3.50 RMLoad System:Modules.Clib
RMEnsure SharedCLibrary 3.50 Error You need Clib 3.50 or later
|
RMEnsure ColourTrans 0.51 RMLoad System:Modules.Colours
RMEnsure ColourTrans 0.51 Error You need ColourTrans 0.51 or later
|
Set MimeMap$Path System:Modules.Network.
RMEnsure MimeMap 0.10 RMLoad MimeMap:MimeMap
RMEnsure MimeMap 0.10 Error This application requires MimeMap version 0.10. Please contact your supplier
Unset MimeMap$Path
|
|RMENSURE ColourDbox 0.00  RMLOAD System:modules.toolbox.colourdbox
|RMENSURE ColourDbox 0.03  ERROR You need colourdbox 0.03 or later to run !smbserver
|RMENSURE ColourMenu 0.00  RMLOAD System:modules.toolbox.colourmenu
|RMENSURE ColourMenu 0.10  ERROR You need colourmenu 0.10 or later to run !smbserver

RMENSURE DCS   0.00  RMLOAD System:modules.toolbox.DCS_Quit
RMENSURE DCS   1.00  ERROR You need DCS_Quit 1.00 or later to run !smbserver

|RMENSURE FileDbox   0.00  RMLOAD System:modules.toolbox.FileDbox
|RMENSURE FileDbox   1.00  ERROR You need fileinfo 1.00 or later to run !smbserver

RMENSURE FileInfo   0.00  RMLOAD System:modules.toolbox.fileinfo
RMENSURE FileInfo   0.05  ERROR You need fileinfo 0.05 or later to run !smbserver
|RMENSURE FontDbox   0.00  RMLOAD System:modules.toolbox.fontdbox
|RMENSURE FontDbox   0.03  ERROR You need fontdbox 0.03 or later to run !smbserver
|RMENSURE FontMenu   0.00  RMLOAD System:modules.toolbox.fontmenu
|RMENSURE FontMenu   0.11  ERROR You need fontmenu 0.11 or later to run !smbserver

RMENSURE Iconbar    0.00  RMLOAD System:modules.toolbox.iconbar
RMENSURE Iconbar    1.08  ERROR You need iconbar 1.08 or later to run !smbserver

RMENSURE Menu       0.00  RMLOAD System:modules.toolbox.menu
RMENSURE Menu       0.15  ERROR You need menu 0.15 or later to run !smbserver
|RMENSURE PrintDbox  0.00  RMLOAD System:modules.toolbox.printdbox
|RMENSURE PrintDbox  0.03  ERROR You need printdbox 0.10 or later to run !smbserver

RMENSURE ProgInfo   0.00  RMLOAD System:modules.toolbox.proginfo
RMENSURE ProgInfo   0.05  ERROR You need proginfo 0.05 or later to run !smbserver

|RMENSURE SaveAs     0.00  RMLOAD System:modules.toolbox.saveas
|RMENSURE SaveAs     0.03  ERROR You need saveas 0.03 or later to run !smbserver
|RMENSURE Scale      0.00  RMLOAD System:modules.toolbox.scale
|RMENSURE Scale      0.03  ERROR You need scale 0.03 or later to run !smbserver
      
RMENSURE TextGadgets 0.00  RMLOAD System:modules.toolbox.TextGadget
RMENSURE TextGadgets 0.11  ERROR You need TextGadget 0.11 or later to run !smbserver

RMENSURE ToolAction 0.00  RMLOAD System:modules.toolbox.ToolAction
RMENSURE ToolAction 0.16  ERROR You need ToolAction 0.16 or later to run !smbserver

RMENSURE Toolbox    0.00  RMLOAD System:modules.toolbox.toolbox
RMENSURE Toolbox    1.23  ERROR You need toolbox 1.23 or later to run !smbserver
RMENSURE Window     0.00  RMLOAD System:modules.toolbox.window
RMENSURE Window     1.15  ERROR You need window 1.15 or later to run !smbserver

rmensure SmbServer 0.01 RMLOAD <samba$dir>.modules.SmbServer

Setmacro ver$temp <Boot$OSVersion>
if ver$temp = "310" then rmensure CallASWI 0.01 rmload <samba$dir>.modules.CallASWI
if ver$temp = "350" then rmensure CallASWI 0.01 rmload <samba$dir>.modules.CallASWI
if ver$temp = "360" then rmensure CallASWI 0.01 rmload <samba$dir>.modules.CallASWI
if ver$temp = ""    then rmensure CallASWI 0.01 rmload <samba$dir>.modules.CallASWI  
unset ver$temp

*WimpSlot -min 2000k
set smbserver$dir <Obey$Dir>
*run <samba$Dir>.!RunImage %*0 